object Fretencao: TFretencao
  Left = 633
  Top = 280
  Width = 549
  Height = 334
  Caption = 'Reten'#231#245'es '
  Color = 16776176
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 521
    Height = 249
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'CODIGO'
        Title.Caption = 'C'#243'digo'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DESCRICAO'
        Title.Caption = 'Reten'#231#227'o'
        Width = 228
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ALIQUOTA'
        Title.Caption = 'Aliquota'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CODRECEITA'
        Title.Caption = 'C'#243'digo Receita'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NOMERECEITA'
        Title.Caption = 'Descri'#231#227'o Receita'
        Visible = True
      end>
  end
  object Button1: TButton
    Left = 200
    Top = 256
    Width = 75
    Height = 25
    Caption = 'Incluir'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 280
    Top = 256
    Width = 75
    Height = 25
    Caption = 'Alterar'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 360
    Top = 256
    Width = 75
    Height = 25
    Caption = 'Excluir'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 440
    Top = 256
    Width = 75
    Height = 25
    Caption = 'Sair'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    OnClick = Button4Click
  end
  object IBCConnection1: TIBCConnection
    Database = 'C:\brasfort\BRASFORT.FDB'
    ClientLibrary = 'gds32.dll'
    Username = 'sysdba'
    Password = 'masterkey'
    Server = 'localhost'
    Connected = True
    Left = 8
    Top = 248
  end
  object IBCTransaction1: TIBCTransaction
    DefaultConnection = IBCConnection1
    Active = True
    Left = 40
    Top = 248
  end
  object retencaoQuery: TIBCQuery
    Connection = IBCConnection1
    SQL.Strings = (
      'select *from retencao')
    Active = True
    Left = 72
    Top = 248
    object retencaoQueryCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Required = True
    end
    object retencaoQueryDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 100
    end
    object retencaoQueryALIQUOTA: TFloatField
      FieldName = 'ALIQUOTA'
    end
    object retencaoQueryCODRECEITA: TIntegerField
      FieldName = 'CODRECEITA'
    end
    object retencaoQueryNOMERECEITA: TStringField
      FieldName = 'NOMERECEITA'
      Size = 60
    end
  end
  object DataSource1: TDataSource
    DataSet = retencaoQuery
    Left = 104
    Top = 248
  end
end
